home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Reference & Presen…rary 6 (Reseller Edition)
/
Apple Ref. & Pres. Lib.v6.0.toast
/
mac
/
2-Graphics
/
Apple Graphics Library
/
HyperCard Artwork
/
Product Clip Art
/
background_3064.txt
< prev
next >
Wrap
Text File
|
1990-08-16
|
2KB
|
120 lines
-- background: 3064 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 0
-- name:
-- part 1 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=25 top=0 right=271 bottom=247
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: A
----- HyperTalk script -----
on mouseUp
put the mouseV into y
add 10 to y
divide y by 16
put the trunc of y into y
get line y of field a
set lockscreen to true
go next background
find it
set lockscreen to false
end mouseUp
-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=267 top=0 right=257 bottom=489
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: B
----- HyperTalk script -----
on mouseUp
put the mouseV into y
add 10 to y
divide y by 16
put the trunc of y into y
get line y of field B
set lockscreen to true
go next background
find it
set lockscreen to false
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=86 top=315 right=336 bottom=208
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: show all cards
----- HyperTalk script -----
on mouseUp
show all cards
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=339 top=315 right=336 bottom=383
-- title width / last selected line: 0
-- icon id / first selected line: 19104 / 19104
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: PREVIOUS CARD
----- HyperTalk script -----
on mouseUp
visual wipe right
go to previous card
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=213 top=315 right=336 bottom=252
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: exit
----- HyperTalk script -----
on mouseUp
answer "Are you sure you want to exit?" with "Quit" or "Home" or "Cancel"
if it is "Quit" then domenu quit HyperCard
if it is "home" then domenu home
end mouseUp